home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_78.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  747 b   |  30 lines
  1. on keyDown
  2.   global global_volume, skip_intro
  3.   if (the frame <= label("first_frame")) and (the key = " ") then
  4.     set skip_intro to 1
  5.   end if
  6.   if the frame > label("mmstart") then
  7.     if the key = "+" then
  8.       set global_volume to global_volume + 1
  9.       UpdateVolume()
  10.     end if
  11.     if the key = "-" then
  12.       set global_volume to global_volume - 1
  13.       UpdateVolume()
  14.     end if
  15.   end if
  16.   if the frame = label("mac_intro") then
  17.     if the key = "+" then
  18.       set global_volume to global_volume + 1
  19.       UpdateVolume()
  20.     end if
  21.     if the key = "-" then
  22.       set global_volume to global_volume - 1
  23.       UpdateVolume()
  24.     end if
  25.     if (the key = " ") and (the machineType <> 256) then
  26.       go("mmstart")
  27.     end if
  28.   end if
  29. end
  30.